home *** CD-ROM | disk | FTP | other *** search
/ Chip 2000 October / CHIP Turkiye Ekim 2000.iso / prog / demo / MATH / _SETUP.1 / Abt_math.exe / 0 / RCDATA / TPERMASFRM / TPERMASFRM.txt
Encoding:
Text File  |  2000-07-28  |  16.2 KB  |  552 lines
  1. object PERMASFRM: TPERMASFRM
  2.   Left = 40
  3.   Top = 116
  4.   HelpContext = 20
  5.   ActiveControl = BASTAR
  6.   BorderIcons = [biSystemMenu]
  7.   BorderStyle = bsSingle
  8.   Caption = 'TAHAKKUK RAPORU'
  9.   ClientHeight = 413
  10.   ClientWidth = 796
  11.   Color = clBtnFace
  12.   DefaultMonitor = dmDesktop
  13.   Font.Charset = DEFAULT_CHARSET
  14.   Font.Color = clWindowText
  15.   Font.Height = -11
  16.   Font.Name = 'MS Sans Serif'
  17.   Font.Style = []
  18.   OldCreateOrder = True
  19.   Position = poScreenCenter
  20.   OnClose = FormClose
  21.   OnCreate = FormCreate
  22.   OnShow = FormShow
  23.   PixelsPerInch = 96
  24.   TextHeight = 13
  25.   object Bevel1: TBevel
  26.     Left = 8
  27.     Top = 8
  28.     Width = 785
  29.     Height = 65
  30.   end
  31.   object GroupBox1: TGroupBox
  32.     Left = 8
  33.     Top = 2
  34.     Width = 785
  35.     Height = 71
  36.     TabOrder = 2
  37.     object Label1: TLabel
  38.       Left = 38
  39.       Top = 17
  40.       Width = 65
  41.       Height = 16
  42.       Caption = 'Ilk Tarih :'
  43.       Font.Charset = DEFAULT_CHARSET
  44.       Font.Color = clMaroon
  45.       Font.Height = -13
  46.       Font.Name = 'MS Sans Serif'
  47.       Font.Style = [fsBold]
  48.       ParentFont = False
  49.     end
  50.     object Label2: TLabel
  51.       Left = 30
  52.       Top = 49
  53.       Width = 76
  54.       Height = 16
  55.       Caption = 'Son Tarih :'
  56.       Font.Charset = DEFAULT_CHARSET
  57.       Font.Color = clMaroon
  58.       Font.Height = -13
  59.       Font.Name = 'MS Sans Serif'
  60.       Font.Style = [fsBold]
  61.       ParentFont = False
  62.     end
  63.     object DOSOPEN: TSpeedButton
  64.       Left = 302
  65.       Top = 16
  66.       Width = 99
  67.       Height = 45
  68.       Caption = 'Dosya ac'
  69.       Font.Charset = DEFAULT_CHARSET
  70.       Font.Color = clBlack
  71.       Font.Height = -13
  72.       Font.Name = 'MS Sans Serif'
  73.       Font.Style = [fsBold]
  74.       Glyph.Data = {
  75.         76010000424D7601000000000000760000002800000020000000100000000100
  76.         04000000000000010000130B0000130B00001000000000000000000000000000
  77.         800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
  78.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF0033333333B333
  79.         333B33FF33337F3333F73BB3777BB7777BB3377FFFF77FFFF77333B000000000
  80.         0B3333777777777777333330FFFFFFFF07333337F33333337F333330FFFFFFFF
  81.         07333337F3FF3FFF7F333330F00F000F07333337F77377737F333330FFFFFFFF
  82.         07333FF7F3FFFF3F7FFFBBB0F0000F0F0BB37777F7777373777F3BB0FFFFFFFF
  83.         0BBB3777F3FF3FFF77773330F00F000003333337F773777773333330FFFF0FF0
  84.         33333337F3FF7F37F3333330F08F0F0B33333337F7737F77FF333330FFFF003B
  85.         B3333337FFFF77377FF333B000000333BB33337777777F3377FF3BB3333BB333
  86.         3BB33773333773333773B333333B3333333B7333333733333337}
  87.       NumGlyphs = 2
  88.       ParentFont = False
  89.       OnClick = DOSOPENClick
  90.     end
  91.     object Yaz: TSpeedButton
  92.       Left = 465
  93.       Top = 16
  94.       Width = 63
  95.       Height = 45
  96.       Caption = 'Yaz'
  97.       Font.Charset = DEFAULT_CHARSET
  98.       Font.Color = clBlack
  99.       Font.Height = -13
  100.       Font.Name = 'MS Sans Serif'
  101.       Font.Style = [fsBold]
  102.       Glyph.Data = {
  103.         76010000424D7601000000000000760000002800000020000000100000000100
  104.         04000000000000010000120B0000120B00001000000000000000000000000000
  105.         800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
  106.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00300000000000
  107.         0003377777777777777308888888888888807F33333333333337088888888888
  108.         88807FFFFFFFFFFFFFF7000000000000000077777777777777770F8F8F8F8F8F
  109.         8F807F333333333333F708F8F8F8F8F8F9F07F333333333337370F8F8F8F8F8F
  110.         8F807FFFFFFFFFFFFFF7000000000000000077777777777777773330FFFFFFFF
  111.         03333337F3FFFF3F7F333330F0000F0F03333337F77773737F333330FFFFFFFF
  112.         03333337F3FF3FFF7F333330F00F000003333337F773777773333330FFFF0FF0
  113.         33333337F3F37F3733333330F08F0F0333333337F7337F7333333330FFFF0033
  114.         33333337FFFF7733333333300000033333333337777773333333}
  115.       NumGlyphs = 2
  116.       ParentFont = False
  117.       OnClick = YazClick
  118.     end
  119.     object Kapat: TSpeedButton
  120.       Left = 528
  121.       Top = 16
  122.       Width = 73
  123.       Height = 45
  124.       Caption = 'Kapat'
  125.       Font.Charset = DEFAULT_CHARSET
  126.       Font.Color = clBlack
  127.       Font.Height = -13
  128.       Font.Name = 'MS Sans Serif'
  129.       Font.Style = [fsBold]
  130.       Glyph.Data = {
  131.         76010000424D7601000000000000760000002800000020000000100000000100
  132.         04000000000000010000120B0000120B00001000000000000000000000000000
  133.         800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
  134.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00330000000000
  135.         03333377777777777F333301111111110333337F333333337F33330111111111
  136.         0333337F333333337F333301111111110333337F333333337F33330111111111
  137.         0333337F333333337F333301111111110333337F333333337F33330111111111
  138.         0333337F3333333F7F333301111111B10333337F333333737F33330111111111
  139.         0333337F333333337F333301111111110333337F33FFFFF37F3333011EEEEE11
  140.         0333337F377777F37F3333011EEEEE110333337F37FFF7F37F3333011EEEEE11
  141.         0333337F377777337F333301111111110333337F333333337F33330111111111
  142.         0333337FFFFFFFFF7F3333000000000003333377777777777333}
  143.       NumGlyphs = 2
  144.       ParentFont = False
  145.       OnClick = KapatClick
  146.     end
  147.     object EKYAZ: TSpeedButton
  148.       Left = 401
  149.       Top = 16
  150.       Width = 63
  151.       Height = 45
  152.       Hint = 'Detayli bilgileri ekranda g∩┐╜ster'
  153.       Glyph.Data = {
  154.         76010000424D7601000000000000760000002800000020000000100000000100
  155.         04000000000000010000120B0000120B00001000000000000000000000000000
  156.         800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
  157.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333300000000
  158.         0000333377777777777733330FFFFFFFFFF033337F3FFF3F3FF733330F000F0F
  159.         00F033337F777373773733330FFFFFFFFFF033337F3FF3FF3FF733330F00F00F
  160.         00F033337F773773773733330FFFFFFFFFF033337FF3333FF3F7333300FFFF00
  161.         F0F03333773FF377F7373330FB00F0F0FFF0333733773737F3F7330FB0BF0FB0
  162.         F0F0337337337337373730FBFBF0FB0FFFF037F333373373333730BFBF0FB0FF
  163.         FFF037F3337337333FF700FBFBFB0FFF000077F333337FF37777E0BFBFB000FF
  164.         0FF077FF3337773F7F37EE0BFB0BFB0F0F03777FF3733F737F73EEE0BFBF00FF
  165.         00337777FFFF77FF7733EEEE0000000003337777777777777333}
  166.       NumGlyphs = 2
  167.       ParentShowHint = False
  168.       ShowHint = True
  169.       OnClick = EKYAZClick
  170.     end
  171.     object SpeedButton3: TSpeedButton
  172.       Left = 601
  173.       Top = 16
  174.       Width = 78
  175.       Height = 45
  176.       Caption = 'Yard∩┐╜m'
  177.       Font.Charset = DEFAULT_CHARSET
  178.       Font.Color = clBlack
  179.       Font.Height = -13
  180.       Font.Name = 'MS Sans Serif'
  181.       Font.Style = []
  182.       Glyph.Data = {
  183.         76010000424D7601000000000000760000002800000020000000100000000100
  184.         04000000000000010000120B0000120B00001000000000000000000000000000
  185.         800000800000008080008000000080008000808000007F7F7F00BFBFBF000000
  186.         FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00333333333333
  187.         3333333333FFFFF3333333333F797F3333333333F737373FF333333BFB999BFB
  188.         33333337737773773F3333BFBF797FBFB33333733337333373F33BFBFBFBFBFB
  189.         FB3337F33333F33337F33FBFBFB9BFBFBF3337333337F333373FFBFBFBF97BFB
  190.         FBF37F333337FF33337FBFBFBFB99FBFBFB37F3333377FF3337FFBFBFBFB99FB
  191.         FBF37F33333377FF337FBFBF77BF799FBFB37F333FF3377F337FFBFB99FB799B
  192.         FBF373F377F3377F33733FBF997F799FBF3337F377FFF77337F33BFBF99999FB
  193.         FB33373F37777733373333BFBF999FBFB3333373FF77733F7333333BFBFBFBFB
  194.         3333333773FFFF77333333333FBFBF3333333333377777333333}
  195.       NumGlyphs = 2
  196.       ParentFont = False
  197.       OnClick = SpeedButton3Click
  198.     end
  199.   end
  200.   object BASTAR: TMaskEdit
  201.     Left = 155
  202.     Top = 13
  203.     Width = 89
  204.     Height = 24
  205.     EditMask = '!99/99/0000;1;_'
  206.     Font.Charset = DEFAULT_CHARSET
  207.     Font.Color = clBlack
  208.     Font.Height = -13
  209.     Font.Name = 'MS Sans Serif'
  210.     Font.Style = [fsBold]
  211.     MaxLength = 10
  212.     ParentFont = False
  213.     TabOrder = 0
  214.     Text = '  .  .    '
  215.     OnKeyPress = BASTARKeyPress
  216.   end
  217.   object BITTAR: TMaskEdit
  218.     Left = 155
  219.     Top = 44
  220.     Width = 89
  221.     Height = 24
  222.     EditMask = '!99/99/0000;1;_'
  223.     Font.Charset = DEFAULT_CHARSET
  224.     Font.Color = clBlack
  225.     Font.Height = -13
  226.     Font.Name = 'MS Sans Serif'
  227.     Font.Style = [fsBold]
  228.     MaxLength = 10
  229.     ParentFont = False
  230.     TabOrder = 1
  231.     Text = '  .  .    '
  232.     OnKeyPress = BITTARKeyPress
  233.   end
  234.   object DBGrid1: TDBGrid
  235.     Left = 4
  236.     Top = 82
  237.     Width = 789
  238.     Height = 329
  239.     DataSource = DataSource1
  240.     Font.Charset = DEFAULT_CHARSET
  241.     Font.Color = clBlack
  242.     Font.Height = -11
  243.     Font.Name = 'MS Sans Serif'
  244.     Font.Style = [fsBold]
  245.     Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgRowSelect, dgAlwaysShowSelection, dgConfirmDelete, dgCancelOnExit]
  246.     ParentFont = False
  247.     ReadOnly = True
  248.     TabOrder = 3
  249.     TitleFont.Charset = DEFAULT_CHARSET
  250.     TitleFont.Color = clMaroon
  251.     TitleFont.Height = -11
  252.     TitleFont.Name = 'MS Sans Serif'
  253.     TitleFont.Style = [fsBold]
  254.     OnDblClick = DBGrid1DblClick
  255.     Columns = <
  256.       item
  257.         Expanded = False
  258.         FieldName = 'SCNO'
  259.         Title.Caption = 'Sicil'
  260.         Width = 30
  261.         Visible = True
  262.       end
  263.       item
  264.         Expanded = False
  265.         FieldName = 'YIL'
  266.         Title.Caption = 'Yil'
  267.         Width = 30
  268.         Visible = True
  269.       end
  270.       item
  271.         Expanded = False
  272.         FieldName = 'AY'
  273.         Title.Caption = 'Ay'
  274.         Width = 20
  275.         Visible = True
  276.       end
  277.       item
  278.         Expanded = False
  279.         FieldName = 'padi'
  280.         Title.Caption = 'Personel Adi'
  281.         Width = 131
  282.         Visible = True
  283.       end
  284.       item
  285.         Expanded = False
  286.         FieldName = 'BRUT-UCRET'
  287.         Title.Caption = 'Brut Ucret'
  288.         Visible = True
  289.       end
  290.       item
  291.         Expanded = False
  292.         FieldName = 'OZEL-KES-TOP'
  293.         Title.Caption = 'Ozel K.Top'
  294.         Visible = True
  295.       end
  296.       item
  297.         Expanded = False
  298.         FieldName = 'NET-UCRET'
  299.         Title.Caption = 'Net Ucret'
  300.         Visible = True
  301.       end
  302.       item
  303.         Expanded = False
  304.         FieldName = 'ssk-isci-prm'
  305.         Title.Caption = 'SSK Isci Prim'
  306.         Visible = True
  307.       end
  308.       item
  309.         Expanded = False
  310.         FieldName = 'TTES-ISCI-PRM'
  311.         Title.Caption = 'Tas.Tes.Isci'
  312.         Visible = True
  313.       end
  314.       item
  315.         Expanded = False
  316.         FieldName = 'GELIR-VERGI'
  317.         Title.Caption = 'G.Vergisi'
  318.         Visible = True
  319.       end
  320.       item
  321.         Expanded = False
  322.         FieldName = 'DAMGA-VERGI'
  323.         Title.Caption = 'D.Vergisi'
  324.         Visible = True
  325.       end>
  326.   end
  327.   object MAASTAB: TTable
  328.     OnCalcFields = MAASTABCalcFields
  329.     DatabaseName = 'MYCODE'
  330.     Filtered = True
  331.     OnFilterRecord = MAASTABFilterRecord
  332.     ReadOnly = True
  333.     TableName = 'Permaas.DB'
  334.     Left = 280
  335.     Top = 8
  336.     object MAASTABYIL: TSmallintField
  337.       FieldName = 'YIL'
  338.     end
  339.     object MAASTABAY: TSmallintField
  340.       FieldName = 'AY'
  341.     end
  342.     object MAASTABSCNO: TSmallintField
  343.       FieldName = 'SCNO'
  344.     end
  345.     object MAASTABTIGUN: TSmallintField
  346.       FieldName = 'TIGUN'
  347.     end
  348.     object MAASTABGELGUN: TSmallintField
  349.       FieldName = 'GEL-GUN'
  350.     end
  351.     object MAASTABGECGUN: TSmallintField
  352.       FieldName = 'GEC-GUN1'
  353.     end
  354.     object MAASTABULIIZIN: TSmallintField
  355.       FieldName = 'ULI-IZIN1'
  356.     end
  357.     object MAASTABUSIZIZIN: TSmallintField
  358.       FieldName = 'USIZ-IZIN1'
  359.     end
  360.     object MAASTABGECGUN2: TSmallintField
  361.       FieldName = 'GEC-GUN2'
  362.     end
  363.     object MAASTABULIIZIN2: TSmallintField
  364.       FieldName = 'ULI-IZIN2'
  365.     end
  366.     object MAASTABUSIZIZIN2: TSmallintField
  367.       FieldName = 'USIZ-IZIN2'
  368.     end
  369.     object MAASTABGECSAAT: TFloatField
  370.       FieldName = 'GEC-SAAT'
  371.     end
  372.     object MAASTABFMESAI1: TFloatField
  373.       FieldName = 'F-MESAI1'
  374.     end
  375.     object MAASTABFMESAI2: TFloatField
  376.       FieldName = 'F-MESAI2'
  377.     end
  378.     object MAASTABFMESAI3: TFloatField
  379.       FieldName = 'F-MESAI3'
  380.     end
  381.     object MAASTABFMESAI4: TFloatField
  382.       FieldName = 'F-MESAI4'
  383.     end
  384.     object MAASTABGVAR: TFloatField
  385.       FieldName = 'G-VAR'
  386.     end
  387.     object MAASTABNMESTOP: TCurrencyField
  388.       FieldName = 'N-MES-TOP'
  389.       DisplayFormat = '###,##0'
  390.     end
  391.     object MAASTABFMESTOP1: TCurrencyField
  392.       FieldName = 'F-MESTOP1'
  393.       DisplayFormat = '###,##0'
  394.     end
  395.     object MAASTABFMESTOP2: TCurrencyField
  396.       FieldName = 'F-MESTOP2'
  397.       DisplayFormat = '###,##0'
  398.     end
  399.     object MAASTABFMESTOP3: TCurrencyField
  400.       FieldName = 'F-MESTOP3'
  401.       DisplayFormat = '###,##0'
  402.     end
  403.     object MAASTABFMESTOP4: TCurrencyField
  404.       FieldName = 'F-MESTOP4'
  405.       DisplayFormat = '###,##0'
  406.     end
  407.     object MAASTABGECEVTOP: TCurrencyField
  408.       FieldName = 'GECE-V-TOP'
  409.       DisplayFormat = '###,##0'
  410.     end
  411.     object MAASTABEKODETOP: TCurrencyField
  412.       FieldName = 'EK-ODE-TOP'
  413.       DisplayFormat = '###,##0'
  414.     end
  415.     object MAASTABSOSYARTOP: TCurrencyField
  416.       FieldName = 'SOS-YAR-TOP'
  417.       DisplayFormat = '###,##0'
  418.     end
  419.     object MAASTABEKKESTOP: TCurrencyField
  420.       FieldName = 'EK-KES-TOP'
  421.       DisplayFormat = '###,##0'
  422.     end
  423.     object MAASTABBRUTUCRET: TCurrencyField
  424.       FieldName = 'BRUT-UCRET'
  425.       DisplayFormat = '###,##0'
  426.     end
  427.     object MAASTABSSKMAT: TCurrencyField
  428.       FieldName = 'SSK-MAT'
  429.       DisplayFormat = '###,##0'
  430.     end
  431.     object MAASTABSSKISCIPRM1: TCurrencyField
  432.       FieldName = 'SSK-ISCI-PRM1'
  433.       DisplayFormat = '###,##0'
  434.     end
  435.     object MAASTABSSKISCIPRM2: TCurrencyField
  436.       FieldName = 'SSK-ISCI-PRM2'
  437.       DisplayFormat = '###,##0'
  438.     end
  439.     object MAASTABSSKISCIPRM3: TCurrencyField
  440.       FieldName = 'SSK-ISCI-PRM3'
  441.       DisplayFormat = '###,##0'
  442.     end
  443.     object MAASTABSSKISCIPRM4: TCurrencyField
  444.       FieldName = 'SSK-ISCI-PRM4'
  445.       DisplayFormat = '###,##0'
  446.     end
  447.     object MAASTABSSKISCIPRM5: TCurrencyField
  448.       FieldName = 'SSK-ISCI-PRM5'
  449.       DisplayFormat = '###,##0'
  450.     end
  451.     object MAASTABSSKISCIPRM6: TCurrencyField
  452.       FieldName = 'SSK-ISCI-PRM6'
  453.       DisplayFormat = '###,##0'
  454.     end
  455.     object MAASTABSSKISVPRM1: TCurrencyField
  456.       FieldName = 'SSK-ISV-PRM1'
  457.       DisplayFormat = '###,##0'
  458.     end
  459.     object MAASTABSSKISVPRM2: TCurrencyField
  460.       FieldName = 'SSK-ISV-PRM2'
  461.       DisplayFormat = '###,##0'
  462.     end
  463.     object MAASTABSSKISVPRM3: TCurrencyField
  464.       FieldName = 'SSK-ISV-PRM3'
  465.       DisplayFormat = '###,##0'
  466.     end
  467.     object MAASTABSSKISVPRM4: TCurrencyField
  468.       FieldName = 'SSK-ISV-PRM4'
  469.       DisplayFormat = '###,##0'
  470.     end
  471.     object MAASTABSSKISVPRM5: TCurrencyField
  472.       FieldName = 'SSK-ISV-PRM5'
  473.       DisplayFormat = '###,##0'
  474.     end
  475.     object MAASTABSSKISVPRM6: TCurrencyField
  476.       FieldName = 'SSK-ISV-PRM6'
  477.       DisplayFormat = '###,##0'
  478.     end
  479.     object MAASTABTTESISCIPRM: TCurrencyField
  480.       FieldName = 'TTES-ISCI-PRM'
  481.       DisplayFormat = '###,##0'
  482.     end
  483.     object MAASTABTTESISVPRM: TCurrencyField
  484.       FieldName = 'TTES-ISV-PRM'
  485.       DisplayFormat = '###,##0'
  486.     end
  487.     object MAASTABGELIRVERGI: TCurrencyField
  488.       FieldName = 'GELIR-VERGI'
  489.       DisplayFormat = '###,##0'
  490.     end
  491.     object MAASTABGVMMATA: TCurrencyField
  492.       FieldName = 'GVM-MATA'
  493.       DisplayFormat = '###,##0'
  494.     end
  495.     object MAASTABGVMMATY: TCurrencyField
  496.       FieldName = 'GVM-MATY'
  497.       DisplayFormat = '###,##0'
  498.     end
  499.     object MAASTABUCRIZINMAT: TCurrencyField
  500.       FieldName = 'UCR-IZIN-MAT'
  501.       DisplayFormat = '###,##0'
  502.     end
  503.     object MAASTABDAMGAVERGI: TCurrencyField
  504.       FieldName = 'DAMGA-VERGI'
  505.       DisplayFormat = '###,##0'
  506.     end
  507.     object MAASTABNETUCRET: TCurrencyField
  508.       FieldName = 'NET-UCRET'
  509.       DisplayFormat = '###,##0'
  510.     end
  511.     object MAASTABpadi: TStringField
  512.       FieldKind = fkCalculated
  513.       FieldName = 'padi'
  514.       Size = 25
  515.       Calculated = True
  516.     end
  517.     object MAASTABsskisciprm: TFloatField
  518.       FieldKind = fkCalculated
  519.       FieldName = 'ssk-isci-prm'
  520.       DisplayFormat = '###,##0'
  521.       Calculated = True
  522.     end
  523.     object MAASTABsskisvprm: TFloatField
  524.       FieldKind = fkCalculated
  525.       FieldName = 'ssk-isv-prm'
  526.       DisplayFormat = '###,##0'
  527.       Calculated = True
  528.     end
  529.     object MAASTABFMESTOP: TCurrencyField
  530.       FieldKind = fkCalculated
  531.       FieldName = 'F-MESTOP'
  532.       DisplayFormat = '###,##0'
  533.       Calculated = True
  534.     end
  535.     object MAASTABOZELKESTOP: TCurrencyField
  536.       FieldKind = fkCalculated
  537.       FieldName = 'OZEL-KES-TOP'
  538.       DisplayFormat = '###,##0'
  539.       Calculated = True
  540.     end
  541.   end
  542.   object PrintDialog1: TPrintDialog
  543.     Left = 248
  544.     Top = 40
  545.   end
  546.   object DataSource1: TDataSource
  547.     DataSet = MAASTAB
  548.     Left = 248
  549.     Top = 8
  550.   end
  551. end
  552.